﻿'{"Code":1,"Msg":"Success","Data":{"PageIndex":1,"PageSize":30,"TotalCount":1,"TotalPages":1,"HasPreviousPage":false,"HasNextPage":false,"Items":[{"id":"0","f_id":"0","gtin":"00768497313989","description_cn":null, "specification_cn": null, "brand_cn": null, "gpc": null, "gpc_name": null, "origin_cn": null, "origin_name": null, "codeNet": null, "codeNetContent": null, "suggested_retail_price": 0,"suggested_retail_price_unit":null, "txtKeyword": null, "picfilename": null, "realname": "INDUSTRIAS FACELA, S.A. DE C.V.","branch_code":null, "branch_name": null, "importer_name": null, "certificatefilename": null, "certificatestatus": 0,"isprivary":0,"isconfidentiality":0,"datasource":3}]}}
Public Class Jsonkeywords
    Inherits Sy.Data.JsonObject(Of Jsonkeywords)
    Public Property suggestions As List(Of ClsData)
    Public Class ClsData
        Public Property value As String = ""
    End Class
End Class




'Public Module Test
'    Public Function Test()
'        Dim Json As String = "{}"
'        '1
'        Dim Obj = ClsResult.DeserializeSafety(Json)
'        If Obj.IsNotNull() Then
'            Dim name = Obj.result
'        End If

'        '2
'        Try
'            Dim Obj2 = ImportProduct.Deserialize(Json)
'        Catch ex As Exception
'            Throw ex
'        End Try
'    End Function
'End Module

